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[0 0 3 1 ] B7&#JH1-5i:, Rf^-fcSftSx-* 
(D) ^tl^7r^/V (FF) ^IAi-5fcft© 
tV^^E (DD) ULi, S, L 2 ^ F*J.fctfK 

(RNG) t» Bt-§-ft$tb-5x-^ • -fe^^M*JO/< 
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(ef) t. T-fzmwk-rzttibK&mztiimit 
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SrffiF-i-teU fWW^oy^ (CB) t3£xm%{k-T-f 

•ytiyir (edb) a^ftsnif-g^k^-^fe^i-s 

(C) IBM Corporation 1994. All rights reserved. 
/* l/^-K*^ */ 
typedef struct btrec 
1 

ULONG funcnum; 
ULONG key; 



¥® (e) k, ^itf-PZ-s/vX^'Zu^-y^ 

■ 7 (EDF) {r#tjAtP#S (O) 

S) jJM&jSSih/C^S. 

[0032] kt«s i ii^m<Dmmm^mmi-^tc 

[0 0 3 3] 
[*1] 



/* m&^o^Kuc^-m-tz */ 

/* MiCic:»i-5^-(no func©»£\ K^-frT 



) 



-***-ffi=64k-l */ 
/* &CDx-*©ft£ */ 

/* ftm-fny* */ 
/* T */ 



ULONG length; 
ULONG start 
ULONG cntrlblock[20] 
UCHAR data [500]; 
} BTREC; 

typedef BTREC FAR * PBTREC; 

/* m&ffl#i3£VMmB& */ 

ftdefine ENC0DE1 (d, k) (UCHAR) (d " (UCHAR) k) 

ttdefine ENC0DE2(d,k) (UCHAR) ( (UCHAR) Cd) " (UCHAR) k) 

#define ENC0DE3(d,k) (UCHAR) (d " (UCHAR) ~k) 

#def ine DEC0DE1 (d, k) (UCHAR) (d " (UCHAR) k) 

ftdefine DEC0DE2(d,k) (UCHAR) C (UCHAR) (d (UCHAR) k)) 

#define DEC0DE3 (d, k) (UCHAR) (d " (UCHAR) ~k) 

/* %W : NewKey */ 

/* tm : **k:ttffl+5*-fciS+ */ 

USHORT NewKey (VOID) 
{ 

USHORT key; /* */ 

/* SL»a» */ 

key= (USHORT) rand (); 

/* SLSSrEI- */ 

return (key) ; 

} 

/* : NewFunc */ 

/* KM. : SEUfcffiffl-f SHftS^SrSi" V 

ULONG NewFunc (VOID) 

i 

ULONG func; /* Mi 

/* SLfc^P>Slfc#g-£»< */ 

func= (ULONG) rand (); 



V 
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if (func<10000) func=l; 
else if (func<20000) func=2; 
else func=3; 

/* MicS-^-SrS-r */ 

return (func) ; 

} 

/* £fc : NewLength */ 

/* Input: TPS */ 

/* ±m */ 

/* Returns: Length */ 

SHORT NewLength (SHORT lower, SHORT upper) 

{ 

SHORT len; 

SHORT r; /* SLSfe */ 

short i; /*im&m*/ 

/* Get a random number */ 
r= (SHORT) rand (); 

/* ClOgfiHfc^y^U &Z*fm-tZ */ 
j=MAX_RANDOM_NUMER/(upper-lower+l) ; 
len=lower-t-r/j; 
return (len) ; 

} 

/* : FillStdData */ 

VOID FillStdData (PBTREC pbtrec) 
{ 

ULONG i; /* Count */ 

/* ua-KwSfliffl^aSScSrSftiitp */ 
for(i=l; i<=500; i++) 

pbtrec->data [ i ] = (CHAR) rand () ; 
for(i=l; i<=20; i++) 

pbtrec->cntr lb lock [i ] = (ULONG) rand () ; 
pbtrec->start=0; 

pbtrec->length=NewLength(30, 100) ; /* 30-100O$5|gc9SL$c : iSrtl] <9 STS */ 
pbtrec->f uncnum=NewFunc () ; 
pbtrec->key=NewKey () ; 
return; 

} 

I* : StartPos */ 

/* mm : datanrtO-r-^OMJftttaSrftei-S */ 

VOID StartPos (PBTREC pbtrec) 

{ 

while (pbtrec->start>500-pbtrec->length) 

pbtrec->start= (ULONG) rand () ; 
return; 
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/* £ffc : ApplyFunc */ 

fcM*&tta-edatB[] fc*5 < */ 

/* A^J : U3-Kfc*ti"5#-f^ */ 

VOID ApplyFunc(PBTREC pbtrec) 

{ 

ULONG i; /* Count */ 

/* HjBcS-f-tiSfta */ 

if (pbtrec->funcnum=l) 
{ 

for (i=0; i<pbtrec->length; i++) 

pbtrec->data[i+pbtrec->start]=ENCODEl (pbtrec->data[i], pbtrec->key) 

> 

} 

else if (pbtrec->funcnum=2) 
{ 

for (i=0; i<pbtrec->length; i++) 
pbtrec->data[i+pbtrec->start]=ENC0DE2 (pbtrec->data[i] , pbtrec->key) 

) 

else if (pbtrec->funcnum=3 | | pbtrec->funcnum != 0) 
{ 

for (i=0; i<pbtrec->length; i++) 
pbtrec->data[i+pbtrec->start]=ENC0DE3(pbtrec->data[i],pbtrec->key) 

> 

} 

return ; 

} 

/* £%F : TxData */ 

/* Eifi : mWr-fbWQrfv yt^&xkt* */ 

VOID TxData ( (PBTREC pbtrec) 

{ 

pbtrec->cntr lblock [1 ] =pbtrec-> length; 
pbtrec->cntrlblock[4]=pbtrec->start; 
pbtrec->cntr lblock [9] =pbtrec->funcnum; 
pbtrec->cntr lblock [15] =pbtrec->key; 
return; 

} 



[0 0 3 4] U3-K»jg Tbtrecj f±R|HHb7 ? -*& 

&UmiT%o SJW^Py^cntrlblock[]tt, ±fE©F, 
K, L 2 fcJ;U ? StCxtJj;-f-?,ftiE(0 7^-/UK Tfuncnu 
mj > Tkeyj N length] . TstartJ $d@© 

rdata[500]j t«toT^$JX, Lfc^oT, Li(15 0 
fc<» ^rsB*Bff*fl2'f f -^ • yoy^Sr^r1"53IJ£0!ISr 



[00 3 5] Bf^tB8«*J«ttJ«(»BtB8»:fiB8Sc Tencode 

lj „ TENC0DE2J . TENC0DE3J r DECODE 1 J , 

rDEC0DE2j , rDEC0DE3j \C J; o T^Si £tb5„ 
*#Bf^fkffl»©iS»Ba(BcT?fc5 r t ^*>i»% 5. ENCODE 
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[0 0 4 3 ] Lfc^ot, 2o©7 Wcntrlblock[]*J 

J:tWata[] f±, fWESrfi 5 £ £ ©-<?# 5Ht-^btff« £ Rt 
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